object FetchMgr: TFetchMgr Left = 248 Top = 282 Width = 613 Height = 420 Caption = 'Message Dispatcher' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Menu = MainMenu OldCreateOrder = True Position = poScreenCenter OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object FormPanel: TPanel Left = 9 Top = 38 Width = 587 Height = 298 Align = alClient BevelOuter = bvNone Constraints.MinHeight = 30 Constraints.MinWidth = 30 TabOrder = 0 object VSplit: TSplitter Left = 0 Top = 139 Width = 587 Height = 4 Cursor = crVSplit Align = alTop ResizeStyle = rsUpdate end object pnInfo: TPanel Left = 0 Top = 0 Width = 587 Height = 139 Align = alTop BevelOuter = bvNone TabOrder = 0 object hList: THeaderControl Left = 0 Top = 0 Width = 587 Height = 21 Sections = < item Alignment = taCenter ImageIndex = -1 Text = '#' Width = 64 end item Alignment = taCenter ImageIndex = -1 Text = 'Read' Width = 64 end item Alignment = taCenter ImageIndex = -1 Text = 'Receive' Width = 64 end item ImageIndex = -1 Text = 'Delete' Width = 64 end item ImageIndex = -1 Text = 'Open' Width = 64 end item ImageIndex = -1 Text = 'Size' Width = 64 end item ImageIndex = -1 Text = 'From' Width = 64 end item ImageIndex = -1 Text = 'To' Width = 64 end item ImageIndex = -1 Text = 'Subject' Width = 64 end item ImageIndex = -1 Text = 'Time' Width = 64 end> end object fList: TMailDispatcherGrid Left = 0 Top = 21 Width = 587 Height = 118 Align = alClient ColCount = 10 DefaultRowHeight = 18 DefaultDrawing = False FixedCols = 0 FixedRows = 0 GridLineWidth = 0 Options = [goThumbTracking] PopupMenu = PopUp TabOrder = 1 Header = hList OnFocusItem = fListFocusItem end end object pnMsg: TPanel Left = 0 Top = 143 Width = 587 Height = 155 Align = alClient BevelOuter = bvLowered TabOrder = 1 object eMsg: TTextEditor Left = 1 Top = 1 Width = 585 Height = 153 BgColor = clBlack TextColor = clBlack SelColor = clBlack SelBgColor = clBlack QuoteColor = clBlack RefColor = clBlack Kludge1Color = clBlack Kludge2Color = clBlack Kludge3Color = clBlack ReadOnly = True FontCharset = 1 TabOrder = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Pitch = fpFixed Font.Style = [] Align = alClient end end end object DockTop: TDock97 Left = 0 Top = 0 Width = 605 Height = 38 object Toolbar: TToolbar97 Left = 0 Top = 0 Caption = 'Toolbar' DockedTo = DockTop DockPos = 0 TabOrder = 0 object bForward: TToolbarButton97 Left = 184 Top = 0 Width = 35 Height = 34 Hint = 'Forward' ParentShowHint = False ShowHint = True OnClick = mForwardClick end object ToolbarSep971: TToolbarSep97 Left = 219 Top = 0 end object bCancel: TToolbarButton97 Left = 225 Top = 0 Width = 34 Height = 34 Hint = 'Cancel dispatching' ParentShowHint = False ShowHint = True OnClick = bCancel1Click end object bOK: TToolbarButton97 Left = 0 Top = 0 Width = 34 Height = 34 Hint = 'Start transfer' ParentShowHint = False ShowHint = True OnClick = bOk1Click end object bReplyAll: TToolbarButton97 Left = 150 Top = 0 Width = 34 Height = 34 Hint = 'Reply to All' ParentShowHint = False ShowHint = True OnClick = mReplyAllClick end object bReply: TToolbarButton97 Left = 115 Top = 0 Width = 35 Height = 34 Hint = 'Reply' ParentShowHint = False ShowHint = True OnClick = mReplyClick end object bOpen: TToolbarButton97 Left = 74 Top = 0 Width = 35 Height = 34 Hint = 'Open message' ParentShowHint = False ShowHint = True OnClick = Reply1Click end object bInfo: TToolbarButton97 Left = 40 Top = 0 Width = 34 Height = 34 Hint = 'Show header' AllowAllUp = True GroupIndex = 10 ParentShowHint = False ShowHint = True OnClick = bInfoClick end object ToolbarSep972: TToolbarSep97 Left = 34 Top = 0 end object ToolbarSep973: TToolbarSep97 Left = 109 Top = 0 end end end object DockBottom: TDock97 Left = 0 Top = 336 Width = 605 Height = 9 Position = dpBottom end object DockLeft: TDock97 Left = 0 Top = 38 Width = 9 Height = 298 Position = dpLeft end object DockRight: TDock97 Left = 596 Top = 38 Width = 9 Height = 298 Position = dpRight end object StatusBar: TStatusBar Left = 0 Top = 345 Width = 605 Height = 19 Panels = < item Style = psOwnerDraw Text = 'Status' Width = 100 end item Width = 50 end> OnDrawPanel = StatusBarDrawPanel end object PopUp: TPopupMenu Left = 272 Top = 128 object mmHeader: TMenuItem Caption = '&Show full header' ShortCut = 16456 OnClick = mvHeaderClick end object View1: TMenuItem Caption = '&Open' ShortCut = 13 OnClick = Reply1Click end object mReply: TMenuItem Caption = '&Reply' ShortCut = 16397 OnClick = mReplyClick end object mReplyAll: TMenuItem Caption = 'Reply to &All' ShortCut = 24589 OnClick = mReplyAllClick end object mForward: TMenuItem Caption = '&Forward' ShortCut = 8205 OnClick = mForwardClick end object N1: TMenuItem Caption = '-' end object mmToggle: TMenuItem Caption = '&Toggle flag' object Read1: TMenuItem Caption = '&Read' ShortCut = 16466 Visible = False OnClick = mtsReadClick end object mtsRead: TMenuItem Caption = '&Read' ShortCut = 49 OnClick = mtsReadClick end object Receive1: TMenuItem Tag = 1 Caption = 'Recei&ve' ShortCut = 32 Visible = False OnClick = mtsReadClick end object mtsRece: TMenuItem Tag = 1 Caption = 'Recei&ve' ShortCut = 50 OnClick = mtsReadClick end object Delete1: TMenuItem Tag = 2 Caption = '&Delete' ShortCut = 46 Visible = False OnClick = mtsReadClick end object mtsDel: TMenuItem Tag = 2 Caption = '&Delete' ShortCut = 51 OnClick = mtsReadClick end object Open2: TMenuItem Tag = 3 Caption = '&Open' ShortCut = 16463 Visible = False OnClick = mtsReadClick end object mtsOpen: TMenuItem Tag = 3 Caption = '&Open' ShortCut = 52 OnClick = mtsReadClick end end object mmSetAll: TMenuItem Caption = 'Set flag for all messages' object mmgRead: TMenuItem Caption = '&Read' ShortCut = 16500 OnClick = mmgReadClick end object mmgRece: TMenuItem Tag = 1 Caption = 'Recei&ve' ShortCut = 16501 OnClick = mmgReadClick end object mmgDel: TMenuItem Tag = 2 Caption = '&Delete' ShortCut = 16502 OnClick = mmgReadClick end object mmgOpen: TMenuItem Tag = 3 Caption = '&Open' ShortCut = 16503 OnClick = mmgReadClick end end object mmResetAll: TMenuItem Caption = 'Reset flag for all messages' object mrgRead: TMenuItem Tag = 10 Caption = '&Read' ShortCut = 8308 OnClick = mmgReadClick end object mrgRece: TMenuItem Tag = 11 Caption = 'Recei&ve' ShortCut = 8309 OnClick = mmgReadClick end object mrgDel: TMenuItem Tag = 12 Caption = '&Delete' ShortCut = 8310 OnClick = mmgReadClick end object Open1: TMenuItem Tag = 13 Caption = '&Open' ShortCut = 8311 OnClick = mmgReadClick end end object Toggleflagsforallmessages1: TMenuItem Caption = 'Toggle flag for all messages' object mtgRead: TMenuItem Tag = 20 Caption = '&Read' ShortCut = 116 OnClick = mmgReadClick end object mtgReceive: TMenuItem Tag = 21 Caption = 'Recei&ve' ShortCut = 117 OnClick = mmgReadClick end object mtgDelete: TMenuItem Tag = 22 Caption = '&Delete' ShortCut = 118 OnClick = mmgReadClick end object mtgOpen: TMenuItem Tag = 23 Caption = '&Open' ShortCut = 119 OnClick = mmgReadClick end end object N2: TMenuItem Caption = '-' end object mGO1: TMenuItem Caption = '&GO!' ShortCut = 113 OnClick = bOk1Click end object Cancel1: TMenuItem Caption = 'Cancel' ShortCut = 27 Visible = False OnClick = bCancel1Click end object Popup1: TMenuItem Caption = 'Popup' ShortCut = 32889 Visible = False end end object MainMenu: TMainMenu Left = 112 Top = 73 object Message1: TMenuItem Caption = '&Message' object Open6: TMenuItem Caption = '&Open' ShortCut = 13 OnClick = Reply1Click end object Reply1: TMenuItem Caption = '&Reply' ShortCut = 16397 OnClick = mReplyClick end object ReplytoAll1: TMenuItem Caption = 'Reply to &All' ShortCut = 24589 OnClick = mReplyAllClick end object Forward1: TMenuItem Caption = '&Forward' ShortCut = 8205 OnClick = mForwardClick end object N3: TMenuItem Caption = '-' end object Read6: TMenuItem Caption = '&1 Read' ShortCut = 16466 OnClick = mtsReadClick end object Receive6: TMenuItem Tag = 1 Caption = '&2 Receive' ShortCut = 32 OnClick = mtsReadClick end object Delete6: TMenuItem Tag = 2 Caption = '&3 Delete' ShortCut = 46 OnClick = mtsReadClick end object Open8: TMenuItem Tag = 3 Caption = '&4 Open' ShortCut = 16463 OnClick = mtsReadClick end object N4: TMenuItem Caption = '-' end object GO1: TMenuItem Caption = '&Execute' ShortCut = 113 OnClick = bOk1Click end end object mSelection: TMenuItem Caption = '&Selection' object Setflag1: TMenuItem Caption = 'Set flag' object msSetRead: TMenuItem Caption = '&Read' ShortCut = 90 OnClick = msSetReadClick end object msSetRecv: TMenuItem Tag = 1 Caption = 'Recei&ve' ShortCut = 88 OnClick = msSetReadClick end object msSetDel: TMenuItem Tag = 2 Caption = '&Delete' ShortCut = 67 OnClick = msSetReadClick end object msSetOpen: TMenuItem Tag = 3 Caption = '&Open' ShortCut = 86 OnClick = msSetReadClick end end object Resetflag1: TMenuItem Caption = 'Reset flag' object msResetRead: TMenuItem Caption = '&Read' ShortCut = 65 OnClick = msResetReadClick end object msResetReceive: TMenuItem Tag = 1 Caption = 'Recei&ve' ShortCut = 83 OnClick = msResetReadClick end object msResetDel: TMenuItem Tag = 2 Caption = '&Delete' ShortCut = 68 OnClick = msResetReadClick end object msResetOpen: TMenuItem Tag = 3 Caption = '&Open' ShortCut = 70 OnClick = msResetReadClick end end end object Global1: TMenuItem Caption = '&Global' object Toggleflagforallmessages1: TMenuItem Caption = 'Toggle flag' object Read4: TMenuItem Tag = 20 Caption = '&Read' ShortCut = 16433 OnClick = mmgReadClick end object Receive4: TMenuItem Tag = 21 Caption = 'Recei&ve' ShortCut = 16434 OnClick = mmgReadClick end object Delete4: TMenuItem Tag = 22 Caption = '&Delete' ShortCut = 16435 OnClick = mmgReadClick end object Open5: TMenuItem Tag = 23 Caption = '&Open' ShortCut = 16436 OnClick = mmgReadClick end end object Setflagforallmessages1: TMenuItem Caption = 'Set flag' object Read2: TMenuItem Caption = '&Read' ShortCut = 32817 OnClick = mmgReadClick end object Receive2: TMenuItem Tag = 1 Caption = 'Recei&ve' ShortCut = 32818 OnClick = mmgReadClick end object Delete2: TMenuItem Tag = 2 Caption = '&Delete' ShortCut = 32819 OnClick = mmgReadClick end object Open3: TMenuItem Tag = 3 Caption = '&Open' ShortCut = 32820 OnClick = mmgReadClick end end object Resetflagforallmessages1: TMenuItem Caption = 'Reset flag' object Read3: TMenuItem Tag = 10 Caption = '&Read' ShortCut = 8241 OnClick = mmgReadClick end object Receive3: TMenuItem Tag = 11 Caption = 'Recei&ve' ShortCut = 8242 OnClick = mmgReadClick end object Delete3: TMenuItem Tag = 12 Caption = '&Delete' ShortCut = 8243 OnClick = mmgReadClick end object Open4: TMenuItem Tag = 13 Caption = '&Open' ShortCut = 8244 OnClick = mmgReadClick end end end object View2: TMenuItem Caption = '&View' object mSort: TMenuItem Caption = '&Sort by' OnClick = mSortClick object msbNumber: TMenuItem Tag = 100 Caption = '&Number' GroupIndex = 11 RadioItem = True OnClick = msbNumberClick end object msbSize: TMenuItem Tag = 5 Caption = '&Size' GroupIndex = 11 RadioItem = True OnClick = msbNumberClick end object msbFrom: TMenuItem Tag = 6 Caption = 'S&ender' GroupIndex = 11 RadioItem = True OnClick = msbNumberClick end object msbTo: TMenuItem Tag = 7 Caption = '&Recipient' GroupIndex = 11 RadioItem = True OnClick = msbNumberClick end object msbSubject: TMenuItem Tag = 8 Caption = 'S&ubject' GroupIndex = 11 OnClick = msbNumberClick end object msbTime: TMenuItem Tag = 9 Caption = '&Time' GroupIndex = 11 RadioItem = True OnClick = msbNumberClick end object N6: TMenuItem Caption = '-' GroupIndex = 11 end object msbRead: TMenuItem Tag = 1 Caption = '&1 Read flag' GroupIndex = 11 RadioItem = True OnClick = msbNumberClick end object msbReceive: TMenuItem Tag = 2 Caption = '&2 Receive flag' GroupIndex = 11 RadioItem = True OnClick = msbNumberClick end object msbDelete: TMenuItem Tag = 3 Caption = '&3 Delete flag' GroupIndex = 11 RadioItem = True OnClick = msbNumberClick end object msbOpen: TMenuItem Tag = 4 Caption = '&4 Open flag' GroupIndex = 11 RadioItem = True OnClick = msbNumberClick end object N7: TMenuItem Caption = '-' GroupIndex = 11 end object msbDescend: TMenuItem Caption = '&Descending order' GroupIndex = 12 OnClick = msbDescendClick end end object N5: TMenuItem Caption = '-' end object mvHeader: TMenuItem Caption = '&Header autoview' ShortCut = 16456 OnClick = mvHeaderClick end object mvToolbar: TMenuItem Caption = '&Toolbar' OnClick = mvToolbarClick end object N8: TMenuItem Caption = '-' GroupIndex = 11 end object mEditShortcuts: TMenuItem Caption = '&Edit Shortcut Keys' GroupIndex = 11 ShortCut = 32891 OnClick = mEditShortcutsClick end end end object ReleaseTimer: TTimer Enabled = False Interval = 100 OnTimer = ReleaseTimerTimer Left = 512 Top = 67 end object StartTimer: TTimer Enabled = False Interval = 10 OnTimer = StartTimerTimer Left = 288 Top = 139 end end